From: Glenn Morris Date: Thu, 5 Mar 2009 03:44:04 +0000 (+0000) Subject: (rmail-sort-messages): Use rmail-ensure-blank-line. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~1408 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=ef67d88095667cb15c7fdb9804521dfe83d815a7;p=emacs.git (rmail-sort-messages): Use rmail-ensure-blank-line. --- diff --git a/lisp/mail/rmailsort.el b/lisp/mail/rmailsort.el index cfc93985719..39244669928 100644 --- a/lisp/mail/rmailsort.el +++ b/lisp/mail/rmailsort.el @@ -220,10 +220,7 @@ Numeric keys are sorted numerically, all others as strings." (insert-buffer-substring (current-buffer) (nth 2 msginfo) (nth 3 msginfo)) ;; The last message may not have \n\n after it. - (unless (bolp) - (insert "\n")) - (unless (looking-back "\n\n") - (insert "\n")) + (rmail-ensure-blank-line) (delete-region (nth 2 msginfo) (nth 3 msginfo)) ;; Is current message? (if (nth 1 msginfo)